home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Text / Misc / TextloaderTNG / Rexx / FW-Right.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1999-09-02  |  309 b   |  18 lines
  1. /* Imports text from TLNG 2.0 to FinalWriter97 */
  2. /* FW97_Right V1.0 © 10.08.99 by Jochen Grus   */
  3.  
  4. OPTIONS RESULTS
  5. ADDRESS "FINALW.1"
  6. IF (pos == 0) THEN
  7.    DO
  8.    fontpath = 'Normal'
  9.    END
  10. ELSE DO
  11.    pos = LASTPOS('_', fontpath)
  12.    fontpath = 'Normal'
  13.    END
  14. Style fontpath
  15. Justify Right
  16. Type ' '
  17. Paste
  18. exit